#!/usr/bin/perl

#Sequential Number Arrays

@10 = (1 .. 10);
@100 = (1 .. 100);
@1000 = (100 .. 1000);
@abc = (a .. z);

print "@10";   # Prints number starting from 1 to 10
print "@100";  # Prints number starting from 1 to 100
print "@1000"; # Prints number starting from 1 to 1000
print "@abc";  # Prints number starting from a to z